From: Gerd Moellmann <gerd@gnu.org>
Date: Tue, 15 May 2001 13:37:45 +0000 (+0000)
Subject: (read_key_sequence): Prevent generating a fake
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~40296
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=09d7376400179ce53787f98a40cdb06dc4413a3e;p=emacs.git

(read_key_sequence): Prevent generating a fake
prefix key twice.
---

diff --git a/src/keyboard.c b/src/keyboard.c
index 2a7216f3975..18c1f3e1e3a 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -8221,10 +8221,12 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
 	      window = POSN_WINDOW      (EVENT_START (key));
 	      posn   = POSN_BUFFER_POSN (EVENT_START (key));
 
-	      if (CONSP (posn))
+	      if (CONSP (posn)
+		  || (!NILP (fake_prefixed_keys)
+		      && !NILP (Fmemq (key, fake_prefixed_keys))))
 		{
-		  /* We're looking at the second event of a
-		     sequence which we expanded before.  Set
+		  /* We're looking a second time at an event for which
+		     we generated a fake prefix key.  Set
 		     last_real_key_start appropriately.  */
 		  if (t > 0)
 		    last_real_key_start = t - 1;